Sub Main
dim doc
set doc = application.activedocument

dim cmps,cmp
set cmps = doc
doc.AddText("Hello !", 65, 0, 0, , , pcbUnitMils) 

End Sub
